* fileio.c (Fexpand_file_name): Fix MS-Windows build failure.

diff --git a/src/fileio.c b/src/fileio.c
index d4929184ceec06dc5176d865d3e8795aa9775825..2842839f2b31bbc991ba22cd891f511e1e56f50d 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -1342,7 +1342,7 @@ filesystem tree, not (expand-file-name ".."  dirname).  */)
              memcpy (adir, SSDATA (tem), newdirlen + 1);
            }
          else
-           newdirlen = strlen (aidr);
+           newdirlen = strlen (adir);
          newdir = adir;
        }